package com.walala.logic.utils;

import java.io.File;
import java.io.FileFilter;
import java.io.IOException;
import java.net.JarURLConnection;
import java.net.URL;
import java.net.URLDecoder;
import java.util.Enumeration;
import java.util.LinkedHashSet;
import java.util.Set;
import java.util.jar.JarEntry;
import java.util.jar.JarFile;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;

import com.walala.logic.annotation.HandlerContract;
import com.walala.logic.cache.ServerCache;
import com.walala.logic.handler.MsgHandler;

public class ClassLoadUtils {
	
	private static Logger logger = LoggerFactory.getLogger(ClassLoadUtils.class);
	
	public static void loadClass(String classPath) {
		Set<Class<?>> clsSet = getClasses(classPath);
		for(Class<?> cls : clsSet) {
			if(cls.getAnnotation(HandlerContract.class) != null) {
				try {
					HandlerContract annotation = cls.getAnnotation(HandlerContract.class);
					short cmd = annotation.cmd();
					MsgHandler handler = (MsgHandler)cls.newInstance();
					ServerCache.setHandler(cmd, handler);
				} catch (Exception e) {
					logger.error("loadClass:", e);
				}
			}
		}
	}
	
	private static Set<Class<?>> getClasses(String pack) {
		// 第一个class类的集合
		Set<Class<?>> classes = new LinkedHashSet<Class<?>>();
		// 是否循环迭代
		boolean recursive = true;
		// 获取包的名字 并进行替换
		String packageName = pack;
		String packageDirName = packageName.replace('.', '/');
		// 定义一个枚举的集合 并进行循环来处理这个目录下的things
		Enumeration<URL> dirs;
		try {
			dirs = Thread.currentThread().getContextClassLoader().getResources(packageDirName);
			// 循环迭代下去
			while (dirs.hasMoreElements()) {
				// 获取下一个元素
				URL url = dirs.nextElement();
				// 得到协议的名称
				String protocol = url.getProtocol();
				// 如果是以文件的形式保存在服务器上
				if ("file".equals(protocol)) {
					//System.err.println("file类型的扫描");
					// 获取包的物理路径
					String filePath = URLDecoder.decode(url.getFile(), "UTF-8");
					// 以文件的方式扫描整个包下的文件 并添加到集合中
					findAndAddClassesInPackageByFile(packageName, filePath, recursive, classes);
				} else if ("jar".equals(protocol)) {
					// 如果是jar包文件
					// 定义一个JarFile
					//System.err.println("jar类型的扫描");
					try {
						// 获取jar
						JarFile jar = ((JarURLConnection) url.openConnection()).getJarFile();
						// 从此jar包 得到一个枚举类
						Enumeration<JarEntry> entries = jar.entries();
						// 同样的进行循环迭代
						while (entries.hasMoreElements()) {
							// 获取jar里的一个实体 可以是目录 和一些jar包里的其他文件 如META-INF等文件
							JarEntry entry = entries.nextElement();
							String name = entry.getName();
							// 如果是以/开头的
							if (name.charAt(0) == '/') {
								// 获取后面的字符串
								name = name.substring(1);
							}
							// 如果前半部分和定义的包名相同
							if (name.startsWith(packageDirName)) {
								int idx = name.lastIndexOf('/');
								// 如果以"/"结尾 是一个包
								if (idx != -1) {
									// 获取包名 把"/"替换成"."
									packageName = name.substring(0, idx).replace('/', '.');
								}
								// 如果可以迭代下去 并且是一个包
								if ((idx != -1) || recursive) {
									// 如果是一个.class文件 而且不是目录
									if (name.endsWith(".class") && !entry.isDirectory()) {
										// 去掉后面的".class" 获取真正的类名
										String className = name.substring(packageName.length() + 1, name.length() - 6);
										try {
											// 添加到classes
											// classes.add(Class .forName(packageName + '.' + className));
											classes.add(Thread.currentThread().getContextClassLoader()
													.loadClass(packageName + '.' + className));
										} catch (ClassNotFoundException e) {
											logger.error("添加用户自定义视图类错误 找不到此类的.class文件:", e);
										}
									}
								}
							}
						}
					} catch (IOException e) {
						logger.error("在扫描用户定义视图时从jar包获取文件出错:", e);
					}
				}
			}
		} catch (IOException e) {
			logger.error("在扫描用户定义视图时取文件出错:", e);
		}
		return classes;
	}

	private static void findAndAddClassesInPackageByFile(String packageName,
		String packagePath, final boolean recursive, Set<Class<?>> classes) {
		// 获取此包的目录 建立一个File
		File dir = new File(packagePath);
		// 如果不存在或者 也不是目录就直接返回
		if (!dir.exists() || !dir.isDirectory()) {
			logger.warn("用户定义包名 " + packageName + " 下没有任何文件");
			return;
		}
		// 如果存在 就获取包下的所有文件 包括目录
		File[] dirfiles = dir.listFiles(new FileFilter() {
			// 自定义过滤规则 如果可以循环(包含子目录) 或则是以.class结尾的文件(编译好的java类文件)
			public boolean accept(File file) {
				return (recursive && file.isDirectory()) || (file.getName().endsWith(".class"));
			}
		});
		// 循环所有文件
		for (File file : dirfiles) {
			// 如果是目录 则继续扫描
			if (file.isDirectory()) {
				findAndAddClassesInPackageByFile(packageName + "." + file.getName(),
						file.getAbsolutePath(), recursive, classes);
			} else {
				// 如果是java类文件 去掉后面的.class 只留下类名
				String className = file.getName().substring(0, file.getName().length() - 6);
				try {
					// 添加到集合中去
					// classes.add(Class.forName(packageName + '.' +
					// className));
					// 经过回复同学的提醒，这里用forName有一些不好，会触发static方法，没有使用classLoader的load干净
					classes.add(Thread.currentThread().getContextClassLoader().loadClass(packageName + '.' + className));
				} catch (ClassNotFoundException e) {
					logger.error("添加用户自定义视图类错误 找不到此类的.class文件", e);
				}
			}
		}
	}

//	public static void main(String[] args) throws Exception {
//		ServerCache cache = ServerCache.getInstance();
//		// Set<Class<?>> cc =
//		// ClassHelper.getClasses(Package.getPackage("lxm.mina.chat"));
//		Set<Class<?>> clsSet = ClassLoad.getClasses("cn.jj.pushServer.test.annotation.demo");
//		
//		for(Class<?> cls : clsSet) {
//			if(cls.getAnnotation(ServiceContract.class) != null) {
//				ServiceContract annotation = cls.getAnnotation(ServiceContract.class);
//				String className = annotation.name();
//				System.out.println("className = " + className);
//				Method [] methods = cls.getMethods();
//				if(methods != null){
//					for(Method m : methods){
//						if(m.getAnnotation(OperationContract.class)!=null) {
//							ServiceProcessBean bean = new ServiceProcessBean();
//							bean.setClassName(className);
//							bean.setClazz(cls);
//							
//							OperationContract opAnnotation = m.getAnnotation(OperationContract.class);
//							String key = opAnnotation.key();
//							String methodName = opAnnotation.methodName();
//							System.out.println("key = " + key);
//							System.out.println("methodName = " + methodName);
//							ServiceImpl service = (ServiceImpl) cls.newInstance();
//							m.invoke(service, "sss123434s");
//							
//							bean.setKey(key);
//							bean.setMethod(m);
//							bean.setMethodName(methodName);
//							cache.addProcess2Map(key, bean);
//							
//							//Object obj = cls.newInstance();
//						}
//					}
//				}
//			}
//		}
//		
//		System.out.println("");
//		ServiceProcessBean bean = cache.getProcess2Map("clear");
//		Class<?> clazz = bean.getClazz();
//		Method method = bean.getMethod();
//		method.invoke(clazz.newInstance(), "test");
//	}

}
